home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
serien
/
purity
/
nr.42
/
includes3v1
/
includes3v1.lha
/
Exec
/
Devices.i
< prev
next >
Wrap
Text File
|
1994-12-04
|
938b
|
51 lines
{
exec/devices.i
}
{$I "Include:exec/libraries.i" }
{$I "Include:exec/ports.i" }
TYPE
{***** Device *****************************************************}
Device = record
dd_Library : Library;
end;
DevicePtr = ^Device;
{***** Unit *******************************************************}
Unit = record
unit_MsgPort : MsgPort; { queue for unprocessed messages }
{ instance of msgport is recommended }
unit_flags,
unit_pad : Byte;
unit_OpenCnt : Short; { number of active opens }
end;
Const
UNITF_ACTIVE = %00000001;
UNITF_INTASK = %00000010;
Procedure AddDevice(device : DevicePtr);
External;
Procedure CloseDevice(io : Address); { io is an IORequestPtr }
External;
Function OpenDevice(devName : String; unitNumber : Integer;
io : Address; flags : Integer) : Integer;
External; { io is an IORequestPtr }
Procedure RemDevice(device : DevicePtr);
External;